home *** CD-ROM | disk | FTP | other *** search
/ Virtual Vibrations / Virtual Vibrations.iso / mac / Virtual Vibrations / STAR.DXR / 00046.ls < prev    next >
Encoding:
Text File  |  1994-10-28  |  1.8 KB  |  90 lines
  1. on enterFrame
  2.   puppetPalette(0)
  3. end
  4.  
  5. on mouseDown
  6.   if (the clickOn >= 17) and (the clickOn <= 20) then
  7.     BUTTONDOWN()
  8.   else
  9.     if the clickOn = 48 then
  10.       puppetSound("click")
  11.     end if
  12.   end if
  13. end
  14.  
  15. on mouseUp
  16.   global voice, sourceScreen
  17.   if (the clickOn >= 17) and (the clickOn <= 20) then
  18.     if the clickOn = 17 then
  19.       set voice to 0
  20.       set the movieRate of sprite 27 to 0
  21.       puppetSprite(12, 0)
  22.       puppetSprite(13, 0)
  23.       puppetSprite(23, 0)
  24.       puppetSprite(24, 0)
  25.       puppetSprite(25, 0)
  26.       puppetSprite(27, 0)
  27.       puppetSprite(48, 0)
  28.       go("showMovie2")
  29.       updateStage()
  30.     end if
  31.     if the clickOn = 18 then
  32.       set voice to 0
  33.       set the movieRate of sprite 27 to 0
  34.       puppetSprite(12, 0)
  35.       puppetSprite(13, 0)
  36.       puppetSprite(23, 0)
  37.       puppetSprite(24, 0)
  38.       puppetSprite(25, 0)
  39.       puppetSprite(27, 0)
  40.       puppetSprite(48, 0)
  41.       set voice to 0
  42.       updateStage()
  43.       go("hideMovie")
  44.     end if
  45.     if the clickOn = 19 then
  46.       ADDORDERBUTTON()
  47.     end if
  48.     if the clickOn = 20 then
  49.       set the movieRate of sprite 27 to 0
  50.       puppetSprite(12, 0)
  51.       puppetSprite(13, 0)
  52.       puppetSprite(23, 0)
  53.       puppetSprite(24, 0)
  54.       puppetSprite(25, 0)
  55.       puppetSprite(27, 0)
  56.       puppetSprite(48, 0)
  57.       set voice to 0
  58.       if soundBusy(2) then
  59.         sound stop 2
  60.       end if
  61.       updateStage()
  62.       if sourceScreen = 1 then
  63.         go("interac")
  64.       else
  65.         go("movies")
  66.       end if
  67.     end if
  68.   end if
  69.   if the clickOn = 48 then
  70.     CHANGESOUND6()
  71.   end if
  72.   if the clickOn = 23 then
  73.     go(the frame - 5)
  74.   end if
  75.   if the clickOn = 24 then
  76.     go(the frame - 3)
  77.   end if
  78.   if the clickOn = 25 then
  79.     go(the frame - 1)
  80.   end if
  81. end
  82.  
  83. on exitFrame
  84.   global clipLength, fixpal
  85.   if the movieTime of sprite 27 = clipLength then
  86.     go(the frame - 5)
  87.   end if
  88.   go(the frame)
  89. end
  90.